home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1997 April / EnigmA AMIGA RUN 17 (1997)(G.R. Edizioni)(IT)[!][issue 1997-04][EAR-CD].iso / Recent1 / Filer4_01.lha / Filer / Rexx / MPEGPlayAGA.filer < prev    next >
Text File  |  1995-04-02  |  743b  |  46 lines
  1. /* 
  2.  
  3.    $VER: MPEGPlayAGA.filer 1.1 (2.4.95)
  4.  
  5.    Author:
  6.     Matthias Scheler (tron@lyssa.pb.owl.de)
  7.  
  8.    Function:
  9.     Plays MPEG files with Michael van Elst's mp V1.03.
  10.     It pops up a requester asking to use HAM8 instead of the GRAY8.
  11.  
  12.    History:
  13.     1.1   removed unnecessary ADDRESS 'FilerRexx'
  14.  
  15.    Requires:
  16.     mp V1.03 or newer
  17.     AGA
  18.  
  19.    Call:
  20.     MPEGPlayAGA FILENAME
  21.  
  22.    Example for "Filer.RC":
  23.     REXXCLASS "#?.mpg","","MPEGPlay %s"
  24.  
  25. */
  26.  
  27. PARSE ARG FileName
  28.  
  29. OPTIONS RESULTS
  30.  
  31. 'STATUS Playing MPEG Animation' FileName
  32. PANEL OFF
  33.  
  34. /*
  35.  
  36.    For AGA machines
  37.  
  38. */
  39.  
  40. QUESTBOX 'Play animation in HAM8 ?'
  41. IF RESULT THEN EXEC 'mp -dither ham8' FileName
  42. ELSE EXEC 'mp -dither gray8' FileName
  43.  
  44. PANEL ON
  45. 'HISTORY Played MPEG Animation' FileName
  46.